home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / Tools / Development / PowerD / powerd / source / lib / powerd_lib.lha / PowerD_PPC / Mouse.ass < prev    next >
Text File  |  2000-10-03  |  432b  |  30 lines
  1.  
  2. # Mouse()(r3:LONG)
  3.  
  4.     .text
  5.     .global    _Mouse
  6.  
  7. _Mouse:    li    r3,0
  8.     lis    r4,0x00bf
  9.     ori    r4,r4,0xe001
  10.     lbz    r5,0(r4)
  11.     andi.    r0,r5,1<<6    # lmb?
  12.     bne    noleft
  13.     ori    r3,r3,1
  14. noleft:    lis    r4,0x00df
  15.     ori    r4,r4,0xf016
  16.     lbz    r5,0(r4)
  17.     andi.    r0,r5,1<<2    # rmb?
  18.     bne    noright
  19.     ori    r3,r3,2
  20. noright:    lis    r4,0x00df
  21.     ori    r4,r4,0xf016
  22.     lbz    r5,0(r4)
  23.     andi.    r0,r5,1<<0    # mmb?
  24.     bne    nomiddle
  25.     ori    r3,r3,4
  26. nomiddle:    blr
  27.  
  28.     .type    _Mouse,@function
  29.     .size    _Mouse,$-_Mouse
  30.